John Snow’s Cholera map

Explanation. From https://github.com/lindbrook/cholera

Install the package:

install.packages("cholera")
## 
## The downloaded binary packages are in
##  /var/folders/l5/bsqqnsvj1z7_6zvw3c682_t80000gn/T//Rtmp0puWwS/downloaded_packages
library(cholera)

Including Plots

You can also embed plots, for example:

streetNameLocator(zoom = 1, cases = NULL, highlight = FALSE, add.subtitle = FALSE, add.title = FALSE)
title(main = "Walking Distances")
invisible(lapply(c(1, 191, 46, 363, 85), addWalkingPath))

streetNameLocator(zoom = 1, cases = NULL, highlight = FALSE, add.subtitle = FALSE, add.title = FALSE)
title(main = "Euclidean Distances")
invisible(lapply(c(1, 191, 46, 363, 85), addEuclideanPath))

plot(neighborhoodWalking())

plot(neighborhoodEuclidean())

plot(neighborhoodWalking(case.set = "expected"), "area.polygons")

plot(neighborhoodVoronoi())

plot(neighborhoodWalking(6:7))

plot(neighborhoodWalking(-7))

plot(neighborhoodWalking(6:7, case.set = "expected"), type = "area.polygons")

plot(neighborhoodWalking(-7, case.set = "expected"), type = "area.polygons")

plot(neighborhoodEuclidean(6:7))

plot(neighborhoodEuclidean(-7))

plot(neighborhoodVoronoi(6:7))

plot(neighborhoodVoronoi(-7))